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.(54) TRAFFIC FLOW SIMULATOR 

(57)Abstract: 

PROBLEM TO BE SOLVED: To reduce calculation quantity and to 

shorten calculation time while the reproduction precision of the 

traffic flow of a signal crossing in the lowest block is secured by 

varying the scan intervals of the blocks obtained by dividing a link 

and making the scan interval and the block length of an upstream 

block become integer-fold of the lower block. 

SOLUTION: At the time of dividing the link into the blocks, the 

lowest block is controlled by a signal and the scan interval is set to 

be a minimum, one second, for example. The blocks are set to 

have the scan intervals which are integer-fold of the blocks lower 

than one from the lowest block toward an upper stream. Namely, 
. the scan intervals and the block lengths are set to be twice (a) or 
. three times (b) against the arrangement (c) of the clocks of same 

length from the lowest block to the upper stream. At that time, the 

number of the blocks is adjusted so that the total length of the blocks becomes equal to the length of the 
link. 
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Main Procedure 

call Sub Procl ( L , Maxd T , ScanLi st, 1) ; 

Loopl: y >i^T^X^^yo i {::ol^T 
ScanLi stcO^tSg^^S:^ fj) tB L, 

End of Loopl ; 
End of Main Proc 

Sub Procl (L, Maxd T, ScanLi St, dT) 

L = L- dT; 

dT SrScanListiC AtL-S ; 

if ((L^ dT * n)and(dT * n ^MaxdT))then 

call Sub Procl ( L , Maxd T, ScanLi st, dT*n); 
else if (L ^dT) then 

call Sub Procl ( L , Maxd T, ScanLi st, dT); 
else if (L > 0 ) then 

call Sub Proc2 (L,ScanList, dT);, 
return; 
End of Sub Procl 
Sub Proc2 ( L , ScanList, dT) 

if ( dT> 1 ) then 

dT= dT/n ; 
Loopl :whi le ( L > dT) 
L = L- dT ; 
dT ^ScanLi Stic Aix-S ; 
End of Loopl ; 
if (L>0)then 

call Sub Proc2 (L, ScanList. dT) : 

return; 
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A"""i = min (Kci, Ki)dLi/dti; 
End of Loop2; 

if((t/r^dti and(Ki<Kci))then 

A^"i = min (Kci, K ji — Ki) d L i/dti : 

else if ((t/^Sdti (DUm and(Ki<Kji))then 

A'"i =Kci {Kji-Ki)/(Kji-Kci) • dLi/dti; 

End of Loop3; 

Loop4:T??SJ: >^ i (col'^T 

if ( t ;65dti (Oi^m then 

Qi + l,i =min(A"""'i + l. A'"i) ; 

KidLi =KidLi +Qi + l,idti; 

Ki+ldLi+1 =Ki-i-ldLi + l — Qi + l,idti: 

A«"^i+1 ^A'^^'^i+l -Qi+l.i; 
End of Loop4; 
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• End of Loop4' ; 
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